home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 84
/
Tiger_Disk_084_20xx_Tiger-Crew-Disk_de_Side_D.d64
/
ende ii_46
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
561b
|
11 lines
0 poke53280,.:poke53281,.:print"[147] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160]",
1 poke53265,80:fori=29to33:pokes+7,240::pokes+12,9:
2 s=54272:pokes+24,15:pokes+5,12:pokes+6,87:pokes+11,81:pokes+4,128:poke13,255
4 pokes+12,96:pokes+13,139:forn=4to11:pokes+n,129:
5 print;"[160][160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [160] [197] [206] [196] [197] [160]","","[145]",:pokes+n,128
6 poke53282,n:poke53283,i:poke53284,n:poke53284,peek(53282):pokes+4,205:
7 pokes+1,n:pokes+8,n:print"[145] ende "," "
8 pokes+4,17:pokes+11,128:next:print"[145][145]";:next:fort=1to750:next
9 poke56325,1:print"[147][151] lukian [151]"
10 pokes+4,129::::::::pokes+4,129:sys2048